package com.codemonkey.lq.common.util;

import java.io.File;
import java.io.FileFilter;
import java.io.IOException;
import java.io.Serializable;
import java.net.JarURLConnection;
import java.net.MalformedURLException;
import java.net.URL;
import java.net.URLClassLoader;
import java.net.URLDecoder;
import java.util.ArrayList;
import java.util.Enumeration;
import java.util.Iterator;
import java.util.LinkedHashSet;
import java.util.List;
import java.util.Set;
import java.util.jar.JarEntry;
import java.util.jar.JarFile;
import java.util.zip.ZipEntry;

/**
 * http://www.cnblogs.com/fanlinglong/p/6710134.html
 * Created by fanlinlong on 2017/4/13.
 */
public class PackageFinder {
	public static void main(String[] args) {
		// 类似的 JarTool.java

		//		test();
		test2();

	}

	public static void test() {
		// 包下面的类
		Set<Class<?>> classes = getClasses("com.packge");
		if (classes == null) {
			System.out.printf("null");
		} else {
			System.out.printf(classes.size() + "");
			// 某类或者接口的子类
			Set<Class<?>> inInterface = getByInterface(Serializable.class, classes);
			System.out.printf(inInterface.size() + "");
		}
	}

	public static void test2() {
		Set<Class<?>> classesByJar = getClassesByJar("C:/Users/LQ/.m2/repository/org/apache/logging/log4j/log4j-core/2.8.2/log4j-core-2.8.2.jar");
		for (Class<?> class1 : classesByJar) {
			System.out.println(class1);
		}
		
	}

	/**
	 * 查找某个Jar下所有的类
	 * @param jarFullPath
	 * @return
	 */
	public static Set<Class<?>> getClassesByJar(String jarFullPath) {
		// 创建指向文件系统的URL
		//url = new URL("jar:file:/c:/almanac/my.jar!/");

		// 参见URL_Tests.java

		//  使用URL存取jar文件的例子
		//       http://blog.csdn.net/java2000_net/article/details/2852649	

		//		String path = Thread.currentThread().getContextClassLoader().getResource("").getPath();

		// 拷贝到classpath之下
		//		final String desFileFullPath = (path + new File(jarFullPath).getName()).substring(1); // 
		//		FileHelper.copyFile(jarFullPath, desFileFullPath);

		final String prefix = "jar:file:/";
		final String suffix = "!/";
		final String finalJarPath = prefix + jarFullPath + suffix;

		Set<Class<?>> classes = new LinkedHashSet<Class<?>>();
		try {
			URL url = new URL(finalJarPath);
			scanJar(classes, true, url, "", "");
		} catch (MalformedURLException e) {
			throw new RuntimeException(e);
		}

		//		new File(desFileFullPath).delete();

		return classes;
	}

	/**
	 * 从当前classpath下的包package中获取所有的Class
	 *
	 * @param pack
	 * @return
	 */
	public static Set<Class<?>> getClasses(String pack) {

		// 第一个class类的集合
		Set<Class<?>> classes = new LinkedHashSet<Class<?>>();
		// 是否循环迭代
		boolean recursive = true;
		// 获取包的名字 并进行替换
		String packageName = pack;
		String packageDirName = packageName.replace('.', '/');
		try {
			// 定义一个枚举的集合 并进行循环来处理这个目录下的things
			final Enumeration<URL> dirs = Thread.currentThread().getContextClassLoader()
					.getResources(packageDirName);
			// 循环迭代下去
			while (dirs.hasMoreElements()) {
				// 获取下一个元素
				URL url = dirs.nextElement();
				// 得到协议的名称
				String protocol = url.getProtocol();
				// 如果是以文件的形式保存在服务器上
				if ("file".equals(protocol)) {
					// System.err.println("file类型的扫描");
					// 获取包的物理路径
					String filePath = URLDecoder.decode(url.getFile(), "UTF-8");
					// 以文件的方式扫描整个包下的文件 并添加到集合中
					findAndAddClassesInPackageByFile(packageName, filePath, recursive, classes);
				} else if ("jar".equals(protocol)) {
					// 
					/*scanJar(classes, recursive, url, packageName, packageDirName);
					
						和下面是最后三行代表的差异
					
					 * */

					// 如果是jar包文件
					// 定义一个JarFile
					//                    System.err.println("jar类型的扫描");
					JarFile jar;
					try {
						// 获取jar
						jar = ((JarURLConnection) url.openConnection()).getJarFile();
						// 从此jar包 得到一个枚举类
						Enumeration<JarEntry> entries = jar.entries();
						// 同样的进行循环迭代
						while (entries.hasMoreElements()) {
							// 获取jar里的一个实体 可以是目录 和一些jar包里的其他文件 如META-INF等文件
							JarEntry entry = entries.nextElement();
							String name = entry.getName();
							// 如果是以/开头的
							if (name.charAt(0) == '/') {
								// 获取后面的字符串
								name = name.substring(1);
							}
							// 如果前半部分和定义的包名相同
							if (name.startsWith(packageDirName)) {
								int idx = name.lastIndexOf('/');
								// 如果以"/"结尾 是一个包
								if (idx != -1) {
									// 获取包名 把"/"替换成"."
									packageName = name.substring(0, idx).replace('/', '.');
								}
								// 如果可以迭代下去 并且是一个包
								if ((idx != -1) || recursive) {
									// 如果是一个.class文件 而且不是目录
									if (name.endsWith(".class") && !entry.isDirectory()) {
										// 去掉后面的".class" 获取真正的类名
										String className = name.substring(packageName.length() + 1,
												name.length() - 6);
										try {
											// 添加到classes
											classes.add(Class
													.forName(packageName + '.' + className));
										} catch (ClassNotFoundException e) {
											e.printStackTrace();
										}
									}
								}
							}
						}
					} catch (IOException e) {
						// log.error("在扫描用户定义视图时从jar包获取文件出错");
						e.printStackTrace();
					}

				}
			}
		} catch (IOException e) {
			e.printStackTrace();
		}

		return classes;
	}

	/**
	 * 扫描指定的jar下的类; 如果该Jar依赖于其他jar. 则会异常.
	 * @param classes
	 * @param recursive
	 * @param jarUrl
	 * @param packageName 空代表不筛选
	 * @param packageDirName 空代表不筛选
	 */
	private static void scanJar(Set<Class<?>> classes, boolean recursive, URL jarUrl,
			String packageName, String packageDirName) {
		// 如果是jar包文件
		// 定义一个JarFile
		//                    System.err.println("jar类型的扫描");
		JarFile jar;
		try {
			// 获取jar
			jar = ((JarURLConnection) jarUrl.openConnection()).getJarFile();
			// 从此jar包 得到一个枚举类
			Enumeration<JarEntry> entries = jar.entries();
			// 同样的进行循环迭代
			while (entries.hasMoreElements()) {
				// 获取jar里的一个实体 可以是目录 和一些jar包里的其他文件 如META-INF等文件
				JarEntry entry = entries.nextElement();
				String name = entry.getName();
				// 如果是以/开头的
				if (name.charAt(0) == '/') {
					// 获取后面的字符串
					name = name.substring(1);
				}
				// 如果前半部分和定义的包名相同, 或者是检索所有的类
				if (name.startsWith(packageDirName) || StringHelper.isEmpty(packageDirName)) {
					int idx = name.lastIndexOf('/');
					// 如果以"/"结尾 是一个包
					if (idx != -1) {
						// 获取包名 把"/"替换成"."
						packageName = name.substring(0, idx).replace('/', '.');
					}

					// 如果可以迭代下去 并且是一个包
					if ((idx != -1) || recursive) {
						// 如果是一个.class文件 而且不是目录
						if (name.endsWith(".class") && !entry.isDirectory()) {
							// 去掉后面的".class" 获取真正的类名
							String className = name.substring(packageName.length() + 1, name
									.length() - 6);
							try {
								// 添加到classes
								ClassLoader STAFLoader = PackageFinder.class.getClassLoader();
								URLClassLoader URLLoader = new URLClassLoader(new URL[] { jarUrl },
										STAFLoader);								
								classes.add(Class.forName(packageName + '.' + className,false,URLLoader));
							} catch (ClassNotFoundException e) {
								e.printStackTrace();
							} catch(Exception e){
								e.printStackTrace();
							}catch(Error e){
								e.printStackTrace();
							}
						}
					}
				}
			}
		} catch (IOException e) {
			// log.error("在扫描用户定义视图时从jar包获取文件出错");
			e.printStackTrace();
		}
	}

	/**
	 * 以文件的形式来获取包下的所有Class
	 *
	 * @param packageName
	 * @param packagePath
	 * @param recursive
	 * @param classes
	 */
	public static void findAndAddClassesInPackageByFile(String packageName, String packagePath,
			final boolean recursive, Set<Class<?>> classes) {
		// 获取此包的目录 建立一个File
		File dir = new File(packagePath);
		// 如果不存在或者 也不是目录就直接返回
		if (!dir.exists() || !dir.isDirectory()) {
			// log.warn("用户定义包名 " + packageName + " 下没有任何文件");
			return;
		}
		// 如果存在 就获取包下的所有文件 包括目录
		File[] dirfiles = dir.listFiles(new FileFilter() {
			// 自定义过滤规则 如果可以循环(包含子目录) 或则是以.class结尾的文件(编译好的java类文件)
			public boolean accept(File file) {
				return (recursive && file.isDirectory()) || (file.getName().endsWith(".class"));
			}
		});
		// 循环所有文件
		for (File file : dirfiles) {
			// 如果是目录 则继续扫描
			if (file.isDirectory()) {
				findAndAddClassesInPackageByFile(packageName + "." + file.getName(), file
						.getAbsolutePath(), recursive, classes);
			} else {
				// 如果是java类文件 去掉后面的.class 只留下类名
				String className = file.getName().substring(0, file.getName().length() - 6);
				try {
					// 添加到集合中去
					//classes.add(Class.forName(packageName + '.' + className));
					//经过回复同学的提醒，这里用forName有一些不好，会触发static方法，没有使用classLoader的load干净
					classes.add(Thread.currentThread().getContextClassLoader().loadClass(
							packageName + '.' + className));
				} catch (ClassNotFoundException e) {
					// log.error("添加用户自定义视图类错误 找不到此类的.class文件");
					e.printStackTrace();
				}
			}
		}
	}

	// --------------------------------------------------------------------------------------------------------

	/**
	 * 获取实现了指定接口的实现类
	 * @param clazz
	 * @param classesAll
	 * @return
	 */
	@SuppressWarnings( { "unchecked" })
	public static Set<Class<?>> getByInterface(Class clazz, Set<Class<?>> classesAll) {
		Set<Class<?>> classes = new LinkedHashSet<Class<?>>();
		//获取指定接口的实现类
		if (!clazz.isInterface()) {
			try {
				/**
				 * 循环判断路径下的所有类是否继承了指定类
				 * 并且排除父类自己
				 */
				Iterator<Class<?>> iterator = classesAll.iterator();
				while (iterator.hasNext()) {
					Class<?> cls = iterator.next();
					/**
					 * isAssignableFrom该方法的解析，请参考博客：
					 * http://blog.csdn.net/u010156024/article/details/44875195
					 */
					if (clazz.isAssignableFrom(cls)) {
						if (!clazz.equals(cls)) {//自身并不加进去
							classes.add(cls);
						} else {

						}
					}
				}
			} catch (Exception e) {
				System.out.println("出现异常");
			}
		}
		return classes;
	}
}